[<<Previous Entry]
[^^Up^^]
[Next Entry>>]
[Menu]
[About The Guide]
##############################################################################
###+---------+################################################################
#+-| FOUND() |--------------------------------------------+###################
#| +---------+ Returns current status of the found() flag |###################
#+--------------------------------------------------------+###################
##############################################################################
##############################################################################
#+--| Summary |------------------+############################################
#| #INCLUDE database.hdr |############################################
#+-------------------------------+############################################
##############################################################################
##############################################################################
#+--| Syntax |------------------------------+#################################
#| FUNCTION LOGICAL found PROTOTYPE |#################################
#+------------------------------------------+#################################
##############################################################################
##############################################################################
##########+---| Description |--------------------------------------+##########
##########| The found() flag is set to TRUE if a search from the |##########
##########| CONTINUE, FIND, LOCATE or SEEK commands is successful. |##########
##########| The found() function returns the current status of |##########
##########| the found() flag. |##########
##########+--------------------------------------------------------+##########
##############################################################################
##############################################################################
#########+--| Example 1 |-------------------------------------------+#########
#########| * Search for a customer and, if found, edit |#########
#########| * the customer record. |#########
#########| |#########
#########| PROCEDURE find_customer |#########
#########| PARAMETERS CHAR cust_name(30) |#########
#########| |#########
#########| SEEK cust_name |#########
#########| IF found() |#########
#########| EDIT |#########
#########| ENDIF |#########
#########| ENDPRO |#########
#########+----------------------------------------------------------+#########
##############################################################################
##############################################################################
#########+--| Example 2 |-------------------------------------------+#########
#########| * For unindexed databases, use the LOCATE command. |#########
#########| * In this case, LOCATE each customer who purchased |#########
#########| * an RCA tape deck. |#########
#########| |#########
#########| LOCATE ALL FOR "rcatapedeck" $ squish( c->p ) |#########
#########| DO WHILE found() |#########
#########| DO process_record |#########
#########| CONTINUE |#########
#########| ENDIF |#########
#########+----------------------------------------------------------+#########
##############################################################################
See Also:
squish()
CONTINUE
FIND
LOCATE
SEEK
This page created by ng2html v1.05, the Norton guide to HTML conversion utility.
Written by Dave Pearson